package com.cetool.autocms.server;

import cn.hutool.core.util.ObjectUtil;
import cn.hutool.core.util.StrUtil;
import com.alibaba.fastjson.JSON;
import com.alibaba.fastjson.JSONObject;
import lombok.extern.slf4j.Slf4j;
import org.apache.commons.lang3.StringUtils;
import org.springframework.stereotype.Component;
import javax.websocket.OnClose;
import javax.websocket.OnError;
import javax.websocket.OnMessage;
import javax.websocket.OnOpen;
import javax.websocket.Session;
import javax.websocket.server.PathParam;
import javax.websocket.server.ServerEndpoint;
import java.io.IOException;
import java.util.concurrent.ConcurrentHashMap;

/**
 * WebSocket服务
 *
 * @author 端木超群
 * @date 2021/11/30
 */
@Slf4j
@ServerEndpoint("/ims/{clientId}")
@Component
public class WebSocketServer {
    /**
     * 静态变量，用来记录当前在线连接数。应该把它设计成线程安全的
     */
    private static int onlineCount = 0;

    /**
     * concurrent包的线程安全Set，用来存放每个客户端对应的MyWebSocket对象
     */
    private final static ConcurrentHashMap < String, WebSocketServer> WEB_SOCKET_MAP = new ConcurrentHashMap <>();

    /**
     * 单发类型
     */
    private final static String SEND_TYPE_SINGLE = "1";

    /**
     * 群发类型
     */
    private final static String SEND_TYPE_ALL = "2";

    /**
     * session 与某个客户端的连接会话，需要通过它来给客户端发送数据
     */
    private Session session;

    /**
     * 客户端连接id
     */
    private String clientId = "";

    /**
     * 连接建立成功调用的方法
     *
     * @param clientId 客户端发送过来的消息
     * @param session 传输对象session
     * @author 端木超群
     * @date 2021/11/30
     */
    @OnOpen
    public void onOpen(Session session, @PathParam("clientId") String clientId) {
        this.session = session;
        this.clientId = clientId;
        if (WEB_SOCKET_MAP.containsKey(clientId)) {
            WEB_SOCKET_MAP.remove(clientId);
            WEB_SOCKET_MAP.put(clientId, this);
            // 加入set中
        }
        else {
            WEB_SOCKET_MAP.put(clientId, this);
            // 加入set中
            addOnlineCount();
            // 在线数加1
        }

        log.info("用户连接:" + clientId + ",当前在线人数为:" + getOnlineCount());

        try {
            sendMessage("连接成功");
        }
        catch (IOException e) {
            log.error("用户:" + clientId + ",网络异常!!!!!!");
        }
    }

    /**
     * 连接关闭调用的方法
     *
     * @author 端木超群
     * @date 2021/11/30
     */
    @OnClose
    public void onClose() {
        if (WEB_SOCKET_MAP.containsKey(clientId)) {
            WEB_SOCKET_MAP.remove(clientId);
            // 从set中删除
            subOnlineCount();
        }
        log.info("用户退出:" + clientId + ",当前在线人数为:" + getOnlineCount());
    }

    /**
     * 收到客户端消息后调用的方法
     *
     * @param message 客户端发送过来的消息
     * @author 端木超群
     * @date 2021/11/30
     */
    @OnMessage
    public void onMessage(String message, Session session) {
        log.info("用户消息:" + clientId + ",报文:" + message);
        // 可以群发消息
        // 消息保存到数据库、redis
        if (StrUtil.isNotBlank(message)) {
            try {
                // 解析发送的报文
                JSONObject jsonObject = JSON.parseObject(message);
                // 发送类型
                String sendType = jsonObject.getString("sendType");
                if(ObjectUtil.equal(sendType,SEND_TYPE_ALL)){
                    sendMessageAll(jsonObject.toJSONString());
                    return;
                }
                // 追加发送人(防止串改)
                jsonObject.put("fromUserId", this.clientId);
                String toUserId = jsonObject.getString("toUserId");
                // 传送给对应toUserId用户的websocket
                if (StrUtil.isNotBlank(toUserId) && WEB_SOCKET_MAP.containsKey(toUserId)) {
                    WEB_SOCKET_MAP.get(toUserId).sendMessage(jsonObject.toJSONString());
                }
                else {
                    log.error("请求的userId:" + toUserId + "不在该服务器上");
                    // 否则不在这个服务器上，发送到mysql或者redis
                }
            }
            catch (Exception e) {
                e.printStackTrace();
            }
        }
    }

    /**
     * 错误回调函数
     *
     * @param session 传输对象session
     * @param error 错误信息
     * @author 端木超群
     * @date 2021/11/30
     */
    @OnError
    public void onError(Session session, Throwable error) {
        log.error("用户错误:" + this.clientId + ",原因:" + error.getMessage());
        error.printStackTrace();
    }

    /**
     * 实现服务器主动推送
     *
     * @author 端木超群
     * @date 2021/11/30
     */
    public void sendMessage(String message) throws IOException {
        this.session.getBasicRemote().sendText(message);
    }

    /**
     * 发送自定义消息
     *
     * @author 端木超群
     * @date 2021/11/30
     */
    public static void sendInfo(String message, @PathParam("clientId") String clientId) throws IOException {
        log.info("发送消息到:" + clientId + "，报文:" + message);
        if (StringUtils.isNotBlank(clientId) && WEB_SOCKET_MAP.containsKey(clientId)) {
            WEB_SOCKET_MAP.get(clientId).sendMessage(message);
        }
        else {
            log.error("用户" + clientId + ",不在线！");
        }
    }

    /**
     * 发送信息给所有人
     *
     * @param message 消息
     * @author 端木超群
     * @date 2021/11/30
     */
    public static void sendMessageAll(String message) {
        for (String key : WEB_SOCKET_MAP.keySet()) {
            try {
                WEB_SOCKET_MAP.get(key).sendMessage(message);
            } catch (IOException e) {
                e.printStackTrace();
            }
        }
    }

    /**
     * 计算在线数量
     *
     * @author 端木超群
     * @date 2021/11/30
     */
    public static synchronized int getOnlineCount() {
        return onlineCount;
    }

    /**
     * 计算上线数量
     *
     * @author 端木超群
     * @date 2021/11/30
     */
    public static synchronized void addOnlineCount() {
        WebSocketServer.onlineCount++;
    }

    /**
     * 计算下线数量
     *
     * @author 端木超群
     * @date 2021/11/30
     */
    public static synchronized void subOnlineCount() {
        WebSocketServer.onlineCount--;
    }

}
